(tc-mode-line-format):

Put mode-line-process immediately after mode-name
when setting mode-line-format.

diff --git a/lisp/textmodes/two-column.el b/lisp/textmodes/two-column.el
index 55aa6ea9cc18fb9e9be3d2eb7f59575b8ae05637..6674136e0ae0db52c8b8f2e8403f0ae2464bb9ac 100644 (file)
--- a/lisp/textmodes/two-column.el
+++ b/lisp/textmodes/two-column.el
@@ -235,7 +235,7 @@
 ;; rearranged, so that the pertinent info will show in 40 columns
 (defvar tc-mode-line-format
        '("-%*- %15b --"  (-3 . "%p")  "--%[("  mode-name
-         minor-mode-alist  "%n"  mode-line-process  ")%]%-")
+         minor-mode-alist  mode-line-process  "%n"  ")%]%-")
   "*Value of mode-line-format for a buffer in two-column minor mode.")
 
 (defvar tc-separator ""